home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 1 / The 640 Meg Shareware Studio CD-ROM Volume I (Data Express)(1992).ISO / cad / bm_acad.lsp < prev    next >
Text File  |  1991-06-07  |  2KB  |  34 lines
  1. ;==================================================================
  2. ;   AutoCAD Users Group of San Diego
  3. ;   AutoCAD Benchmark Test Version 1.1
  4. ;   Developed by: Christopher James DeLucchi
  5. ;   not copyrighted, distribute freely
  6. ;==================================================================
  7. (SETVAR "CMDECHO" 0)
  8. (SETQ D1  (GETSTRING T "Computer brand: ")
  9.       D2  (GETSTRING T "Computer model: ")
  10.       D3  (GETSTRING T "CPU model: ")
  11.       D4  (GETSTRING T "CPU speed: ")
  12.       D5  (GETSTRING T "Wait states: ")
  13.       D6  (GETSTRING T "Hard disk size in Mb.: ")
  14.       D7  (GETSTRING T "Hard disk access time in Ms.: ")
  15.       D8  (GETSTRING T "Math coprocessor model: ")
  16.       D9  (GETSTRING T "Math coprocessor speed in MHz: ")
  17.       D10 (GETSTRING T "Main RAM - in Kb.: ")
  18.       D11 (GETSTRING T "Expanded/Extended Memory - in Mb. if applicable: ")
  19.       D12 (GETSTRING T "1st video board brand: ")
  20.       D13 (GETSTRING T "1st video board model: ")
  21.       D14 (GETSTRING T "2nd video board brand if applicable: ")
  22.       D15 (GETSTRING T "2nd video board model if applicable: ")
  23.       D16 (GETSTRING T "AutoCAD Version/Release: ")
  24.       D17 (GETSTRING T "CONFIG.SYS BUFFERS - DOS systems only: ")
  25.       D18 (GETSTRING T "CONFIG.SYS FILES - DOS systems only: ")
  26.       D19 (GETSTRING T "ACADFREERAM - DOS systems only: ")
  27.       D20 (GETSTRING T "Comments: ")
  28.       D21 (GETSTRING T "Filename to save report - no extension: ")
  29.       D21 (STRCASE D21 T)
  30.       V   "1.1"
  31.       T (RTOS (GETVAR "CDATE"))
  32. )
  33. (COMMAND "SCRIPT" "bm-acad")
  34.